home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / feel-075.lha / feel0.75 / bin / new-gcc-ld < prev   
Text File  |  1992-03-16  |  1KB  |  74 lines
  1. #!/bin/sh
  2.  
  3. # $Id: ldn,v 1.2 90/11/29 21:48:09 is Exp $
  4. # $Log:    ldn,v $
  5. # Revision 1.2  90/11/29  21:48:09  is
  6. # Changed brad_export to denton_export
  7. # 
  8. # Revision 1.1  90/11/29  21:47:24  is
  9. # Replacement ld script for Eulisp
  10. # 
  11.  
  12. PATH=/usr/local/bin:/bin:/usr/bin:/usr/ucb:$PATH
  13.  
  14. # A replacement LD script.
  15. # Go through the arguements, and try and guess which are the ones
  16. # which are elvira modules. Construct the setup function
  17.  
  18. echo "Building init_elvira.c"
  19.  
  20. comline=""
  21. elviram=""
  22.  
  23. while [ $# -gt 0 ]
  24. do
  25.     case "$1" in
  26.     -d*)    ;;
  27.     -e)    shift ;;
  28.     /lib/crt0.o) ;;
  29.     -*)
  30.         comline="$comline $1";;
  31.     *init_elvira.o)
  32.         ;;
  33.     *elvira.o)
  34.         comline="$comline init_elvira.o $1";;
  35.     *.o)
  36.         comline="$comline $1"
  37.         elviram="$elviram $1";;
  38.     *)
  39.         comline="$comline $1";;
  40.     esac
  41.     shift
  42. done
  43.  
  44. # When we get here, we should have a list of .o files belonging to 
  45. # Elvira modules
  46. #
  47. # Look for their startup routines
  48.  
  49. elviram=`echo $elviram | sed 's/\.c/.o/g'`
  50.  
  51. initnames=`nm -gp $elviram | egrep ' T _INIT_' | awk '{print $3}' | sed 's/_//'`
  52.  
  53. rm -f init_elvira.c
  54. cat ${FEELDIR}/Src/el_linkins.c > init_elvira.c
  55.  
  56. echo '
  57. void initialise_elvira_modules(LispObject *stacktop) 
  58. {
  59.   dp = nil;
  60.   dlp = nil;
  61.  
  62. ' >> init_elvira.c
  63.  
  64. for i in $initnames
  65. do
  66. echo "    $i(stacktop);" >> init_elvira.c
  67. done
  68. echo "}" >> init_elvira.c
  69.  
  70. unset GCC_EXEC_PREFIX
  71. set -x
  72. gcc -v -c $ElviraHdrs init_elvira.c &&
  73. gcc -v  `echo $comline | sed -e 's/\/lib\/Mcrt1.o//'`
  74.